下面是一个简单的 SAS 宏代码，用于生成 1000 字随机文本。
```sas
%macro 生成随机文本(长度);
%local 字母文本 字母个数 随机文本 i;
%let 字母文本 = abcdefghijklmnopqrstuvwxyz;
%let 字母个数 = %sysfunc(length(&字母文本));
%let 随机文本 = %substr(&字母文本
%sysfunc(floor(%sysfunc(rand('uniform')) * &字母个数)+1)
1);
%do i = 2 %to &长度;
%let 随机文本 = &随机文本%substr(&字母文本
%sysfunc(floor(%sysfunc(rand('uniform')) * &字母个数)+1)
1);
%end;
&随机文本
%mend;
%put %生成随机文本(1000);
```
运行以上代码后，会在日志中打印出一个长度为 1000 的随机文本。
咨询微信客服
0516-6662 4183
立即获取方案或咨询
top
